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Ii0 ABSTRACT 

THIS IS A TEST OF" THE PROGRAM INTERUPT REQUEST 
<PIRQJ LOGIC, 

2.0 REQUIREI^FNTS 

2.1 EQUIPMEMT 

BASIC 11/45 SYSTEM 

2.2 STORAGE 

THIS PROGRAM USES THRU 175f^0 

2.3 PREIIMII^ARY PROGRAMS 
O0AA THRU Q0MA 

3,0 LOADING PROCEDURE 

LOAD PROGRAM USING AB$ LOADER 

4|0 STARTING PROCEDURE 

LOAD ADDRESS 200, PRESS START', ThE PROGRAM WjLl L.OOP 
AND RING BELL ON PASS COMPl,ETION, 

5,0 OPERATING PROCEDURE 

5',1 SWITCH SETTINGS 

NONE 

5,2 SUBROUTINE ABSTRACTS 

5|i2il SCOPE 

SCOPE IS A MOVE PC|R1 AND STORES THE PC^Z JN Rl, 

5,2,2 HLT 

HLT is a halt INSTRUCTION, 

6.0 ERRORS 

ALL ERRORS WILL, CAUSE A HALT 

TRAP AND INTERRUPT ERRORS WILL CAUSE A HALT AT VECT0R*2, 

6.1 ERROR RECOVERY 

PRESS CONTINUE TO PROCEDE TO NEXT TEST 

6.2 ERROR LOOPING 

TO LOOP ON AN ERROR. PLACE A BRANCH TO THE PREVIOUS SCOPE 

INSTRUCTION IN PLACE OF THE HAI.T INSTRUCTION, 

MOTE THAT IF THE ERROR IS INTERMITTANT THAT THE TE5T WILL 

DROP THRU THE HALT ANQ PROCEED TO THE NEXT TEST, 

THEREFORE! TO LOOP THE TEST CONTJNUOSLY REPLACE THE BEQ ,*4 

INSTRUCTION IMHEDIATLY PRECEEDING THE HALT WITH A BRANCH 

BACK TO THE PREVIOUS SCOPE, 

TO LOOP ON TRAP FAILURES, PATCH IN THE FOLLOWING ROUTJNE 
AT THE ADDRESS OF THE TRAP VECTQR, 



TRAPVECl TRAPVEC*4 

TRAPVEC+2i 

TRAPVEC+41 012716 |MOVE SCOPE ADDRESS TO STACK 

TRAPVEC+61 ADDRESS lADDRESS OF PREVIOUS SCOPE 

TRAPVEC+101 000006 IRETURN TO TEST AT SCOPE 



RESTORE ALL LOCaTJONS BEFORE PROCEEDING TO NEXT TEST, 



7,0 RtSTRi^^TlQNS 
NONE 

8.0 MISCELUANEOgS 

ON T«AP CRRO«»S THE STACK P01NTER<R*) WILL CONTAJN THE 
ADDRESS WHERE THE TRAP OCCURCD', 

8.1 EXECUTION TIME 

THIS PROGRAM TAKES ABOUT X MlNUTil', 

8.2 STACK POINTER 

THIS PROGRAH INITJALY SETS Tme STACK POINTER AT 500, 
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NA 



000004 
000005 
000006 
000007 



^00010 
000014 
000020 
1300034 
000030 
?00034 
000064 



.TITLE MAINDECHiDCKBN-A PROS INT RQST LOGtC 
.NLIST MC|MD,SEQ 
.LIST HE 
.ABS 

lOCKBNA- TESTS THAT PROGRAM INTERRUPT REQUEST (PlRQ) HAROHARE WORKS PROPERLY. 
ITHE PIRO LOGIC 'BOOKS' AN INTERRUPT AND WHEN THE PRIORITY LEVEL TALLS 
IBELOW THAT OF THE REQQeST THE INTERRUPT IS TAKEN'. 

INOTEI IT IS NOT SPECIPIEO AS TO WHETHER OR NOT THE NEXT INSTRUCTION IS 
•EXECUTED IF THE 'BOOKED' REQUEST IS GREATER THAN THAT Or THE PROCESSER, 

ISTARTINC PROCEEDURE 

I LOAD ADDRESS«Z00 

I PRESS START 

I STACK POINTER IS AT 900 

I BELL WILL RING WHEN TEST IS COMPLETE 

lEQUATE STATEMENTS 

Rl'Xl 
R2«X2 
R9«X3 
R4«X4 

RSiXS 
SPiX6 
PCiX7 

IVECTOR ADDRESSES 

ERRVEC»4 

RESVEC»10 

TBITVEe.l4 

IOTVEC'20 

PFVEC»24 

EMTVEC»30 

TRPVEC»34 

TPVECi64 /TELETYPE PRINTER INTERRUPT VESTOR 

I ••••##••••••••••••••• INI T I AL STACK PO1nTER»50B»»*» ••••»•••• •••»••••••• 



000500 
010701 
000000 
022626 

177776 
177770 
177544 
177566 
177570 
177570 

000000 
000040 
000100 
000140 



STKPTR«500 
SCOPE»010701 
HLTiHALT 
POP2I022626 

IRESISTER ADDRESSES 
PSWil77776 
UBREAK»177770 
TPCSR»177564 
TPBUFii77566 
SWRil77570 
DISPLAY. 177570 

IPSW BIT ASSIGNMENTS 
PRTY0*0 
PRtYl»40 
PRtY2ii00 
PRTY3»140 



lINITIAL STACK POINTER 
IMOVE PC TO Rl 
I'ERROR HALT 

IPOPS Two WORD OFF THE STACK 

lADDRESS OF PROCESSOR STATUS 
I'AfiDRESS OF MICRO BREAK REGISTER 
IASDRESS of TELEPRINTER CONTROL STATUS 
lAND DATA BUFFER REGISTER 
lAftDRESS OF CONSOLE SWITCH REGISTER 
lAOORESS OF CONSOLE DISPLAY REGISTER 
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000200 PRTy4»200 

000240 PRTy5>240 

000300 PRTY6VS00 

000340 PRTY7i340 

000340 PRTY10"340 

IPIRO BIT ASSIGNMENTS 

000000 PIR0I0 

001000 PIRl>il000 

002000 PIR2«2000 

004000 P|R3*4000 

010000 P|R4*10000 

020000 PIR9«20000 

040000 PIR6«40000 

100000 PIR7'100000 

100000 PIR10I100000 

000000 PIA0*0 

000042 PIAl-42 

000104 P|A2«t04 

000146 PIA3«146 

000210 PIA4*2i0 

000292 PIASa2S2 

000314 PIA6a314 

000356 PIA7-3S6 



IMACRO CALLS 



\ 



H*!NnEc-ll»OeKBN.A PROG INT RQIT LOGIC MAcVll",6B7 29-rEB"72 12ll5 PktZ 3 





000000 


,i0 




000002 


■ *2 


000002 


000000 


HAUT 


000004 


000006 




000006 


000000 


HALT 


000010 


000012 




000012 


000000 


HALT 


000014 


000016 




000016 


000000 


HALT 


000020 


000022 


1*2 


000022 


000000 


HALT 


000024 


000026 


1*2 


000026 


000000 


HALT 


000030 


000032 


• *2 


000032 


000000 


HALT 


000034 


000036 


1*2 


0003o6 


000000 


HALT 


000040 


000042 


1*2 


000042 


000000 


HALT 


000044 


000046 


1*2 


000046 


000000 


HALT 


000090 


000092 


1*2 


000092 


000000 


HALT 


000094 


000096 


1*2 


000096 


000000 


HALT 


000060 


000062 


1*2 


000062 


000000 


HALT 


000064 


000066 


■ *2 


000066 


000000 


HALT 


000070 


000072 


1*2 


000072 


000000 


HALT 


000074 


000076 


1*2 


000076 


000000 


HALT 


000100 


000102 


1*2 


000102 


000000 


HALT 


000104 


000106 


1*2 


000106 


000000 


HALT 


000110 


000112 


• *2 


000112 


000000 


HALT 


000114 


000116 


1*2 


000116 


000000 


HALT 


000120 


000122 


1*2 


000122 


000000 


HALT 


000124 


000126 


1*2 


000126 


000000 


HALT 


000130 


000132 


1*2 


000132 


000000 


HALT 


000134 


000136 


■ *2 


000136 


000000 


HALT 


000140 


000142 


• *2 


000142 


000000 


HALT 


000144 


000146 


■ *2 


000146 


000000 


HALT 
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000190 


000192 


1*2 


000192 


000000 


HALT 


000194 


000196 


1*2 


000196 


000000 


HALT 


000140 


000162 


1*2 


000162 


000000 


HALT 


000164 


000166 


■ *2 


000166 


000000 


HALT 


000170 


000172 


• *2 


000172 


000000 


HALT 


000174 


000176 


• *2 
HALT 


000176 


000000 


000200 


000202 


■ ♦2 
HALT 


000202 


000000 


000204 


000206 


.*2 


000206 


000000 


HALT 


000210 


000212 


1*2 


000212 


000000 


HALT 


000214 


000216 


1*2 


000216 


000000 


HALT 


000220 


000222 


• *2 


000222 


000000 


HALT 


000224 


000226 


.*2 


000226 


000000 


HALT 


000230 


000232 


.*2 

HALT 


000232 


000000 


000234 


000236 


.*2 


000236 


000000 


HALT 


000240 


000242 


■ *2 


000242 


000000 


HALT 


000244 


000246 


• *2 


000246 


000000 


HALT 


000290 


000292 


■ *2 


000292 


000000 


HALT 


000294 


000296 


• *2 


000296 


000000 


HALT 


000260 


000262 


■ *2 


000262 


000000 


HALT 


000264 


000266 


,*2 


000266 


000000 


HALT 


000270 


000272 


.*2 


000272 


000000 


HALT 




SS32?i 




000276 


000000 


HALT 


000300 


000302 


.*2 


000302 


000000 


HALT 


000304 


000306 


.*2 


000306 


000000 


HALT 


000310 


000312 


.*2 

HALT 


000312 


000000 


000314 


000316 


.♦2 


000316 


000000 


HALT 


000320 


000322 


.*2 


000322 


000000 


^ WALT 
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0130324 


000326 








.*2 






000326 


000000 








HALT 






000330 


000332 








1*2 






000332 


000000 








HALT 






000334 


000336 








1*2 






000336 


000000 








HALT 






000340 


000342 








■ *2 






01 an 1 A 4 










HALT 






000344 


000346 








1*2 






000346 


000000 








HALT 






















0003S2 


000000 








HALT 






000394 


000396 








• *2 






000396 


000000 








HALT 






000360 


000362 








• *2 






000362 


000000 








HALT 






000364 


000366 








■ *2 






000366 


000000 








HALT 






000370 


000372 








■ *2 






000372 


000000 








HALT 






000374 


000376 








.♦2 






000376 


000000 








HALT 








000200 








,•200 






0002310 


000167 


000606 






JMP 


START 






001000 








,»1000 






001000 


000000 






ICNTI 







IPASS COUNT 


001002 


177772 






PIl 


177772 




IPPOCRAM INTERRUPT REQUEST REGISTER 


001004 


177775 






PIHl 


177773 




|H!GH (ODD) BYTE 


001006 


000240 






PIRVECI 240 




IPROSRAM INTERRUPT REQUEST INTER- 


001010 


000242 






PIRLVL 


1 242 




IRUPT VECTOR AND STATUS 


001012 


009067 


177762 




ST*RT| 


CLR 


ICNT 


ICIEAR PASS COUNT 


001016 


012706 


000900 






MOV 


#STKPTR,SP 


IINITIALIZE THE STACK PTR 


001022 


012706 


000900 




BEGINI 


MOV 


iPSTKPTH.SP 


liNITIALliE THE STACK POINTER 


001026 


012767 


000340 


176742 




MOV 


#PRTY7|PSW 


iSET PROCESSER PRI0R1TY»7 


001034 


016737 


177740 


177570 




MOV 


ICNT,»#D1SPLAY 


lOlSPLiY PASS COUNT 


001042 


032737 


000420 


177570 




BIT 


#400,»*SWR 


ILOAB MICRO BREAK REGISTER 


001090 


001409 








BEO 


,*10 




001052 


113737 


177970 


177770 




MQVB 


*iltSHR|»#UBREAK 


I'LBAO MICRO BREAK REG WITH SR0i7 










ITEST 


THAT PROGRAM INTERRUPT REGISTER (PIR9) CAN BE ACCESSED 


001060 


012767 


001074 


176716 


T0I 


MOV 


#T0Ai4 


ILOAD ERROR TRAP VECTOR 


001066 


009777 


I777i0 






TST 


• PI 


IREFERENCE PI 


001072 


000403 








BR 


T0B 




001074 


022626 






T0AI 


P0P2 




iPOP 2 WORDS OFF The stack 


001076 


000000 








HIT 




lERROR CP FAILED TO ACCESS Pi 


001100 


000767 








BR 


T0 


I'LOOP TEST IF ERROR 


001102 


012767 


000006 


17*674 


T0BI 


MOV 


«6|4 


i'restore error trap 


001110 


000400 








BR 


Tl 


IGO TO NEXT TEST 










I TEST 


THAT PROGRAM INTERRUPT REGISTER CAN BE LOADED AND CLEARES (Tl-T?) 


001112 


010701 






Til 


SCOPE 
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001114 


012767 


000340 


176654 




MOV 


#PRTY7iPSW 




001122 


012777 


001000 


177692 




MOV 


#PIRli»PI 




001130 


017700 


177646 






MOV 


•PIiR0 




001134 


022700 


001042 






CMP 


#PIR1*PIA1, 


iR0 


001140 


001401 








SEO 


TIA 




001142 


000000 








hlt 






001144 


009077 


177632 




TIAI 


CLR 


•PI 




001190 


017700 


177626 






MOV 


•PI,R0 




001194 


001401 








BEQ 


T2 




001196 


000000 








HLT 






001160 


010701 






T2i 


SCOPE 






001162 


012777 


002000 


177612 




MOV 


#PIR2|»PI 




001170 


017700 


177606 






MOV 


•PIiR0 




001174 


022700 


002104 






CMP 


*PIR2*PIA2, 


,R0 


001200 


001401 








BEQ 


T2A 




001202 


000000 








HLT 






001204 


009077 


177572 




T2AI 


CL" 


•PI 




001210 


017700 


177566 






MOV 


•PIiR0 




001214 


001401 








BEQ 


T3 




001216 


000000 








HLT 






001220 


010701 






T3I 


SCOPE 






001222 


012777 


004000 


177592 




MOV 


•PIR3,»PI 




001230 


01T700 


177546 






MOV 


•PJiR0 




001234 


022700 


004146 






CMP 


iiiP!R3*PIA3, 


,R0 


001240 


001401 








SCO 


T3A 




001242 


000000 








HLT 






001244 


009077 


177532 




T3AI 


Ct,R 


•PI 




001290 


017700 


177526 






MOV 


•PIiR0 




001294 


001401 








BEO 


T4 




001296 


000000 








HLT 







ISET PROCESSER PRIORITY*? 
ISET PlR.l 
(GET RESULT 
iCORRECT RESULT? 

I'tNCORRECT RESULT 

rClEAR PROGRAM INTERRUPT REGISTER 

(GET RESULTS 

iPtRQ DID NOT CLEAR 



iSET PIR«2 
IGCT RESULT 
rCORRECT RESULT 



3 



m4;ndec=ii«ocksn=a pscs in? rsst usgic HAeyii'.ss? s;»rES»;£ isijs pase - 

N* 











T4 i 


9C0PE 






012777 


010000 


17751Z 




MOV 


•PIR4|PPl 


1003,2 'B 


017700 


177906 






MOV 


*P! |RB 


0012^4 




010210 






CMP 


*P JR4*P J A4,R0 












BCO 


T4A 


01014 1fi9 










HUT 




001304 


009077 


177472 




T4tl 


Cl.f 


•l'> 


001310 


017700 


177464 






MOV 


»PliR0 


001314 


001401 








BCO 


T9 


V S A O 










ULT 
Mil 1 




c 101020 


010701 






T5 1 


SCOPE 






n 4 9*9 w 

CIZ/ ' 7 




177492 




MOV 


_ _ 


floii tta 

IS VldOU 




177446 






MOV 


•PI 1 ''0 






020292 










001340 


001401 










T3* 


001342 


iC V 19 v ™ V 








HUT 




001344 


009077 


177432 




TSil 


Ct," 


•PI 


001390 


017700 


177426 






MOV 


MI,R0 


0013S4 


001401 








BCQ 


T6 


Kl p 4 


10110101010 








ULT 




001360 


010701 






T6| 


SCOPE 




001362 


012777 




17 '41Z 




MOV 


- 

iIPJb6|PPj 


001370 


017700 


177406 






MQV 


•PI 1 RB 


001374 


ocZ/vv 


040314 






CMP 


llPIR6*PIA6iR0 


001400 


001401 








BCQ 


T6A 


001402 


000000 








HUT 




001404 


009077 


177372 




T6A 1 


CU^ 


•Pi 


001410 


017700 


177366 






MOV 


•R|>R0 


001414 


001401 








BCQ 


T7 


001416 










HLT 




001420 


010701 






T7| 


SCOPE 




001422 


012777 


100000 


177392 




MOV 


iPIR7,»Pt 


001430 


017700 


177346 






MOV 


•PliR0 


001434 


022700 


100396 






CMP 


«PIR7*PiA7,R0 


001440 


001401 








BEO 


TTA 


001442 


000000 








HUT 




001444 


009077 


177332 




T7* 1 


CUB 


•PI 


001490 


017700 


177326 






MOV 


•PI.R0 


001494 


0014B1 








8EQ 


TIB 


0014S6 


000000 








HUT 












ITEST 


TH*I RESET CUEARS PIRQ 


0014A0 


010701 






T10I 


SCOPE 




0014«2 


012777 


177777 


177312 




MOV 


#-li^PI 


001470 


017700 


177306 






MOV 


•P1.R0 


001474 


022700 


177396 






CMP 


«17700B*PIA7,RB 


001900 


001401 








BEQ 


TIBA 


001502 


000000 








HUT 




001504 


000009 






T10AI 


RESET 





ISET ALL P|R BITS !N MSH AND 
|P!A B!TS f TO 7 IM i.SH 
lOET RESULT 



IRESCT 
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001506 
001512 
001514 
001916 



01770B 
001402 
000000 
000760 



177270 



HOV 
BCQ 
HLT 
BR 



•PSi 
Til 



T10 



R0 



16CT RESULT 
(BRANCH If 

•RESET DID NOT CLEAR ALL BITS 
(LOOP TEST ir RESET PAlLS 
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ITEST THAT ODD BYTE Of PIR8 CAN BE REFERENCED". 



0211522 


^10701 






Till 


SCOPE 




001522 


H2777 


000002 


177254 




MOVB 


lli2i*PlH ILBAD ODD BYTE 


001530 


117700 


177250 






MOVB 


• PJHiRB jGET OCiD BYTE 


001534 


122700 


000002 






CMPB 


#2iR0 lOlD 06D BYTE LOAD CORRECTLY 


001540 


001401 








BEQ 


TllA 


001542 


000000 








HIT 




001544 


017700 


177232 




THAI 


MOV 


•PliR0 iGCT PjRQ 


001550 


022700 


001042 






CMP 


*PIR1*P I Al 1 R0 1C8MPARE WORD 


001554 


001401 








BEQ 


T12 


001556 


000000 








HIpT 


1W6RD Tailed 










iTEST 


THAT EVEN 


BYTE BITS CANNOT BE 'PROGRAM' SET, 


001560 


310701 






T12I 


SCOPE 




001562 


005077 


177214 






CLR 


•PI iCLEAR pirq 


001566 


112777 


177777 


177206 




MOVB 


• ■titPl i'TRY T6 set EVEN BYTE BITS 


001574 


017700 


177202 






MOV 


(•PI1R0 iGET RESULT 


001600 


001401 








BEQ 


T13 


001602 


000000 








HIT 


lERRORl PIRQ GOT LOADED 










1 TEST 


THAT 'PIA' 


' BITS DECODE ONLY THE MOST SIGNIFICANT 'SET' 


1 4 








T13 1 


SCOPE 




001606 


012777 


001000 


17'166 




MOV 


#PIRli»Pl 


001614 


017700 


177162 






MOV 


•PIiR0 


001620 


022700 


001042 






CMP 


#PIR1*PIA1,R0 


001624 


001401 








BEQ 


1 ** 


001626 


000000 








HI.T 






052777 


- 

00C000 






B I S 




001636 


017700 


177140 






MOV 


«PIiR0 


001642 


022700 


003104 






CMP 


#PIRl*PlR2*PIA2,Ra 


001646 


001401 








BEQ 


1 *^ 


001650 


000000 








HIT 




001652 


052777 


004000 


177122 




BIS 


tfP T R!^ . VP T 

wr 1 no 1 "^r l 


001660 


017700 


177116 






MOV 


fPI 1 R0 


001664 


022700 


007146 






CMP 


#PlRl*PIR2*PIRS+PIi3,R0 


001670 


001401 








BEQ 


,** 


001672 


000000 








HI.T 




001674 


052777 


010000 


177100 




BIS 


#PIR4,»PI 


001702 


017700 


177074 






MOV 


»PIiR0 


001706 


022700 


017210 






CMP 


#PIR1*P1R2*PIR34.PIR4*PIA4,R0 


001712 


001401 








BEQ 


,** 


001714 


000000 








HUT 




001716 


052777 


020000 


177056 




BIS 


#PIR5,»P1 


001724 


017700 


177052 






MOV 


•PI,R0 


001730 


022700 


037252 






CMP 


l|iPIRl*PIR2*PiR3+PIR4*PlR5*PIA5,R0 


001734 


001401 








BCO 


,** 


001736 


000000 








HI.T 
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001740 052777 040000 177034 

001746 017700 177030 

0017S2 022700 077314 

001756 001401 

001760 000000 

001762 052777 100000 177012 

001770 017700 177006 

001774 022700 177356 

002000 001401 

002002 000000 



BIS 
MOV 
CMP 
BEQ 
HLT 
BIS 
MOV 
CMP 
BEQ 
HUT 



#PIR6,»PI 
•PIiR0 

#PIR1*PJR2*PIR3*PIR4*P!R5*PIR6*PIA6,R0 
,** 

*PIR7,»PI 
•PIiR0 

#PIRl*PIR2iPtR3*p|R4+PlR5*PIR6*PlR7*PIA7,Ra 
Tl« 
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NA 



jTEST THAT WHEN FRCSRAM iNTERRUrt aCCURS THAT IT P8ES SO At THE eORREGT 
IVECTOR, If THE VECTOR IS INCOHREfiT PROGRAM WILL HALT AT THE INCORRECT VECTOR 
lAODRCSS *Z, 



002004 


010701 






T14I 


SCOPE 


002006 


012777 


002042 


176772 




MOV 


002014 


012777 


000340 


176746 




MOV 


002022 


012777 


001000 


176752 




MOV 


002030 


005067 


175742 






CLR 


002034 


000240 








NOP 


002036 


000000 








HLT 


002040 


000661 








BR 


002042 


200240 






T14Ai 


MOP 


002044 


022626 








P0P2 


002046 


000005 








RESET 


002090 


012767 


000340 


175720 




MOV 



•T14A,»PIRVEC 
#PRTV7,»PiRi.VL 
«PIRli»PI 
PSH 



T13 



«PRTY7,PSW 



002056 
032060 
002066 
002074 
002100 
002106 

002112 
002114 
002116 
002122 
002126 
002130 
002132 



002140 
002142 

002152 
002160 
002166 
002174 
002202 
002206 
002210 
002212 
002214 



I (VECTOR ADDRESS*!), 



010701 






T15I 


SCOPE 




012777 


002114 


1 7479B 




MOU 


ivTi$A;*P!RVEC 


012777 


000340 


176714 




MOV 


#PRTY7ii»PlRLVL 


005067 


175676 






CLR 


PSW 


0127T7 


001000 


176674 




MOV 


iPJRliPPl 


000240 








NOP 












HLT 




000412 








BR 


T16 


022626 






T15AI 


P0P2 




016700 


175654 






MOV 


PSHiR0 


022700 


000340 






CMP 


«PRTV7,R0 


001404 








BEO 


Tl* 


000000 








HLT 




012767 


000340 


175636 




MOV 


#PRTY7iPSW 



(TEST THAN AN INTERRUPT OCCURS 
ILOWERS REQUEST LEVEL BELOW CU' 



010701 
012706 

012777 
012777 
012747 
012777 
005077 
000000 
000402 
022626 
000400 



000500 
176630 
002212 
000340 
000200 
020000 
176574 



T16I 



176626 
176622 
175602 
176600 



T16AI 



SCOPE 
MOV 

MOV 
MOV 
MOV 
MOV 
CLR 
HLT 
BR 

P0P2 
BR 



iSTKPTRiSP 

9?; 

#T16A,PPIRVEC 
#PRTY7.»PIRLVL 

iliPRTY4iPSW 

mPIRS.ppi 
•PI 

T17 
T17 



ILOAD INTERRUPT VECTOR AND 
(PRIORITY LEVEL 

(REQUEST AN INTERRUPT AT LEVEL 1 
(ALLOW INTERRUPTS 

(INTERRUPT FAILED 
(LOOP TEST 

(INTtRPUPTS TO Ti4A 

(CLEAR PIRO 

(LOCK OUT INTERRUPTS 

The wo*o roLLOWiNC the vector jddress 



("CLEAR PSW 

itSRSR iNTtRRuP" riiLtO 



IF INSTRUCTION F0LL0WIN5 REQUEST 
•RENT PR8CESSER STATUS LEVEL', 

(INITIALIZE THE STACK POINTER 
(CLEAR FIRy 

(LOAD INTERRUPT VECTOR 
(AND STATUS 

(SET PROCESSER STATUS EQUAL TO 4 
(REQUEST INTERRUPT AT LEVEL 5 
(DISABLE REQUEST 

("ERRORI PROGRAM DID NOT INTERRUPT 
(58 TO NEXT TEST 

(Oft TO NEXT TEST 



002216 010701 

002220 012706 000500 

002224 005077 176592 

002230 012777 002274 176550 



(TEST THAT IF THE INSTRUCTION FOLLOWING A REQUEST RAISES THE PROCESSER PRIORITY 
I ABOVE THAT OF THE REQUEST THAT THE REQUEST STILL INTERRUPTS". 
T17I SCOPE 

MOV dSTKPTRiSP (INITIALIZE THE STACK POINTER 

CL" (CLEAR PIRO 

MOV «Ti7A,KilRVEC (LOAD INTERRUPT VECTOR 



MAINDEC.ll»OCKBN.A PROS INT RQST LOGIC 
NA 

002236 012777 000340 176544 

002244 012767 000100 1T5524 

002252 912777 004000 176522 

002260 012767 000140 175510 

002266 000240 

002270 000000 

002272 000402 

002274 022626 

002276 000400 

000020 
000021 
000001 
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T17AI 



MOV 
MOV 
MOV 
MQV 
NOP 
HLT 
BR 

P0P2 

BR 



<PRTY7i»PIRLVL 
#PRTY2iPSW 
*P!R3,»PI 
#PRTY3iPSW 



T2B 



(AND STATUS 



lERRORI PROS, INT, NOT ACK'. 



T20 



002300 


010701 






T20I 


SCOPE 




002302 


012706 


000500 






MOV 


mSTKPTR.SP 


002306 


005077 


176470 






CLR 


•PI 


002312 


012777 


002346 


176466 




MOV 


*T20A,PPIRVEC 


002320 


012777 


000340 


176462 




MOV 


*PRTY7»PPIRLVL 


002326 


012767 


000040 


179442 




MOV 


•PBTYliPSW 


002334 


012777 


001000 


176440 




MOV 


#PIR1,»PI 


002342 


000240 








NOP 




002344 


000401 








BR 


T21 


002346 


000000 






T20AI 


HLT 






000002 








N»N4.1 






000021 








CiC*t 






000022 








D»D+1 





002390 


010701 






002392 


012706 


000500 




002396 


005077 


176420 




002362 


012777 


002416 


176416 


002370 


012777 


000340 


176412 


002376 


012767 


000100 


179372 


002404 


012777 


002000 


176370 


002412 


000240 






002414 


000401 






002416 


000000 








000003 








000022 








00002] 






002420 


010701 






002422 


012706 


300500 




002426 


005077 


176390 




002432 


012777 


002466 


176346 


002440 


012777 


000340 


17*342 



0*20 
0^21 
Mill 

(TEST THAT WHEN THE PROCESSER PRIORITY LEVEL (1> IS EQUAL TO TflE PROGRAM 
(INTERRUPT REQUEST LEVEL (I) THAT NO INTERRUPT OCCURS', 

(INITIALIZE THE STACK POINTER 
ICLEAR PROGRAM INTERRUPT REQUEST REG', 

(LOAD Interrupt vector < 

(STATUS 

(SET PROCESSER STATUS EQUAL tO 1 
(REQUEST INTERRUPT AT LEVEL i" 

(CB TO NEXT TEST 

(PROGRAM INTERRUPTED'.STaTUSpREO- 
lUEST LEVEL'l. 



(TEST THAT WHEN THE PROCESSER PRIORITY LEVEL (2) IS EQUAL TO THE PROGRAM 
(INTERRUPT REQUEST LEVEL (2> THAT NO INTERRUPT OCCURS, 



T21I 



T21AI 



SCOPE 
MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
NOP 
BR 
HLT 



iSTKPTR.SP 
MI 

*T21A,»P1RVEC 
#PRTY7i«PIRLVL 
lllPRTY2,PSW 
iliPIR2,PPl 

T22 



llNITliLIZE THE STACK POINTER 

i'OLEAR PROGRAM INTERRUPT ReQUEST REG, 

(LOAD Interrupt vector t 

(STATUS 

(SET PROCESSER STATUS EQUAL tO 2 
(REQUEST INTERRUPT AT LEVEL 2 

(80 TO NEXT TEST 

iPROGRiM INTERRUPTED',ST*TUS»RE0- 
(UEST LEVEL'S, 



NiN+1 
DiD«l 

(TEST THAT WHEN THE PROCESSER PRIORITY LEVEL (3) IS EQUAL TO TflE PROGRAM 
(INTERRUPT REQUEST LEVEL (3) THAT NO INTERRUPT OCCURS', 
'221 SCOPE 

MOV mSTKFTPfSP i'lN'ITlSLIZE THE STACK POINTER 

CLR •RI (CLEAR PROSRAM INTERRUPT REQUEST REG', 

MOV •T22A,»PIRVEC (LOAD INTERRUPT VECTOR ( 

MOV iPRTY7i»P;RLvL (STATuS 
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002446 


012767 


0101011 401 


175322 




MOV 


#PRTY3.PSW 


iSET PROCESSER STATUS EQUAL TO 3 


002494 


012777 


004000 


176320 




MOV 


#PIRS,»PI 


IREQUEST INTERRUPT AT LEVEL' 3 


002462 


000240 








NOP 








000401 








eR 


T23 


IGO TO NEXT TEST 


002466 


000000 






T22AI 


HLT 




iPPOGRAM interrupted, STATU9-RE0- 
















lUEST LEVEL'S', 












NiiN+1 
















CiC*l 








000024 








DiD*l 














ITEST 


THAT WHEN 


THE PROCESSER 


PRIORITY LEVEL (4) IS EQUAL TO THE 










I INTERRUPT REQUEST LEVEL (4) THAT NO INTERRUPT OCCURS, 


W lpc4 7i3 


010701 






T23I 


SCOPE 






(HtX9 At O 


012706 


000500 






MOV 


USTKPTRiSP 


IINITIALIZE THE STACK POINTER 


Of a9 A^ A 
ioBc47o 


005077 


176300 






CLR 


•PI 


ICLEAR PROGRAM INTERRUPT REQUEST 




012777 




*' 




MOV 


*T23A,»PIRVEC 


IL8AD INTERRUPT VECTOR i 


^10^0 JLV 


012777 


0iC' 100410 


176272 




MOV 


#PRTY7i«PlRLVL 


iStATUS 


002516 


012767 


000200 






MOV 


«FRTY4,PSW 


I'SET PROCESSER STATUS EQUAL TO 4 




012777 




176250 




MOV 


#PIR4,»PI 


I'REQUEST INTERRUPT AT LEVEL 4 


PI flJC^O 










NOP 
















BR 


T24 


IGO TO NEXT TEST 


002536 


000000 






T23AI 


HLT 




1 PROGRAM INTERRUPTEO.STATUSiREa- 
















lUEST LEVEL»<i 




000005 








NiN*l 








000024 








CiC*l 








000025 








DiD+1 














ITEST 


THAT WHEN 


THE PROCESSER 


PRIORITY LEVEL (5) IS EQUAL TO THE 










• INTERRUPT REQUEST LEVEL (5) THAT NO INTERRUPT OCCURS". 


002540 


010701 






T24| 


SCOPE 






002542 


1711 








MOV 


*STKPTR,SP 


lINITI*LIZE THE STACK POINTER 


002546 


005077 


176230 






CLR 


•PI 


i'CLEAR PROGRAM INTERRUPT REQUEST 


002552 


012777 


002606 


176226 




MOV 


#T24A|»PIRVEC 


ILOAD INTERRUPT VECTOR 6 


002560 


012777 


000340 


176222 




MOV 


#PRTY7i»PIRLVL 


iSTATUS 


002566 


012767 


000240 


175202 




MOV 


#PRTY5|PSW 


ISET PROCESSER STATUS EQUAL TO 5 


002574 


012777 


020000 


176200 




MOV 


*PIR5,»P1 


I'REQUEST INTERRUPT AT LEVEL 5 


002602 










NOP 






002604 


000401 








BR 


T25 


ICB TO NEXT TEST 


002606 


000000 






T24AI 


HLT 




1 PROGRAM INTERRUPTED'. STATUSiREQ- 
















lUEST LEVEL'S, 




000006 








N»N+1 








00002$ 








C»C*1 








000026 








OiD+1 







JTEST THAT WHEN THE PROCESSES PRIORITY LEVEL (6) IS EQUAL TO THE PROGRAM 
I INTERRUPT REQUEST LEVEL !6) THAT NO INTERRUPT OCCURS, 



002610 


5110701 




T25I 


SCOPE 






002612 


SI12706 


000500 




MOV 


#STKPTR,SP 


INITIALIZE THE STACK POINTER 


002616 


005077 


176160 




CLR 


•PI 


i'CLEAR program INTERRUPT REQUEST REG 


002622 


012777 


002656 


176156 


MOV 


*T2SA,»PIRVEC 


ILOAD INTERRUPT VECTOR i 


002630 


PI12777 


000340 


176152 


MOV 


#PRTY7i^PIRLVL 


iSTATUS 


002636 


012767 


000300 


175132 


MQV 


#PRTY6iPSW 


I'SET PROCESSER STATUS EQUAL TO 6 


002644 


012777 


040000 


176130 


MOV 


#P|R6,»PI 


iREQUEST INTERRUPT AT LEVEL 6 


002652 


000240 






NOP 
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002634 000401 
002696 000000 



000007 
000026 
000027 



:25AI 



BR 
HLT 



T26 



IG6 TO NEXT TEST 

/PROGRAM INTERRUPTED,STATUS»RES= 
lUEST LEVEL»6', 



002660 


010701 






T26I 


SCOPE 




002662 


012706 


000500 






MOV 


#STKPTR,SP 


002666 


005077 


176110 






CLR 


•PI 


002672. 


012777 


002726 


176106 




MOV 


»T26A,^PIRVEC 


002700 


012777 


000340 


176102 




MOV 


#PRTY7|»PIRLVL 


002706 


012767 


000340 


179062 




MOV 


#PRTY7iPSW 


002714 


012777 


100000 


1760619 




MOV 


#PIR7,»PI 


002722 


000240 








NOP 




002724 


000401 








BR 


T27 


002726 


000000 






T26AI 


HLT 






000010 








NiN-Kl 






000027 








c»c*i 






000030 








0"D*1 






000001 






Nil 








000000 






Mi0 














JTCST 


THAT WHEN 


THE PROCESSER 










lERRUPT REQUEST 


LEVEL (0) THAT 


002730 


010701 






T27I 


SCOPE 




002732 


012706 


000500 






MOV 


#STKPTR,SP 


002736 


005077 


176040 






CLR 


•PI 


002742 


012777 


002776 


176036 




MOV 


#T27A,^P1RVECI 


002750 


012777 


000340 


176032 




MOV 


iPRTY7|^PlRLVL 


002796 


012767 


000040 


179012 




MOV 


«PRTY1,PSW 


002764 


012777 


000000 


176010 




MOV 


«PIRB|^PI 


002772 


000240 








NOP 


002774 


000401 








BR 


T30 


002776 


000000 






T27AI 


HLT 






000030 








C»C+1 






000031 








0«D+1 






000001 








MiM*l 






000002 








N«N*1 





NiN+1 
C»C+1 
D»0*1 

ITEST THAT WHEN THE PROCESSER PRIORITY LEVEL (7) IS EQUAL TO THE PROGRAM 



INITIALIZE THE STACK POINTER 

i'CLEAR program interrupt request REG, 

ILOAD Interrupt vector i 

iStATUS 

ISET PROCESSER STATUS EQUAL TO 7 
•request interrupt AT LEVEL 7 



IG8 TO NEXT TEST 

IPROGRAM INTERRUPTED', STATUSiRES- 
lUCST LEVEL'7', 



003000 


010701 




T30I 


SCOPE 


003002 


012706 


000500 




MOV 


003006 


005077 


179770 




CLR 


003012 


012777 


003046 


179766 


MOV 


003020 


012777 


000340 


179762 


MOV 


003026 


012767 


000100 


174742 


MOV 


003034 


012777 


001000 


179740 


MOV 


003042 


000240 






NOP 



/INITIALIZE THE STACK POINTER 
i'CLEAR PIRQ 

I'LOAD Interrupt vector 

lANO STATUS 

IJET PROCESSER STATUS EQUAL TO 1 
IREQUEST INTERRUPT AT LEVEL 

180 TO NEXT TEST 

lE»ROR PROGRAM INTERRUPTED WHEN 

iSTATUSil, REQUEST LEVEL«e 



ITEST THAT WHEN THE PROCESSER PRIORITY (2) IS GREATER THAN THE PROGRAM INT 



iSTKPTR.SP /INITIALIZE THE STACK POINTER 

•PI /CLEAR PIR8 

#T3aA,^PIRVEC| /LOAD INTERRUPT VEOTOR 

#PRTYTi»PIRLVL lANO ST/kTuS 

#PRTY2iPSW /SET PROCESSER STATUS EQUAL TO 2 

#PIRli^PI /REQUEST INTERRUPT AT LEVEL 1 
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NA 



003044 000401 
003046 000000 
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T30AI 



BR 
HIT 



T31 



lOe TO NEXT TEST 

lEftROR PROGRAM INTERRUPTED WHEN 

iStATUS.Z, REQUEST LEVEL«1 



000031 
000032 
000002 



DiO>l 
MiM*l 
N«N*l 
(TEST THAT WHEN 
lERRUPT REQUEST 



003090 


010701 






T3it 


SCOPE 




0030S2 


012706 


000900 






MOV 


#STKPTR,SP 


0030S6 


005077 


179720 






CUR 


MI 


003062 


012777 


003116 


179716 




MOV 


«T31A,PP!RVECI 


003070 


012777 


000340 


179712 




MOV 


#PRTY7i»PIRUVL 


003076 


012767 


000140 


1T4672 




MOV 


iPRTYSiPSW 


003104 


012777 


002000 


179670 




MOV 


«P:R2|«PI 


003112 


000240 








NOR 




003H4 


000401 








BR 


T32 


003116 


000000 






T31AI 


HUT 





000032 
000033 
000009 
000004 



CiO*l 
DiD«l 

MvM'til 
NiN+l 
ITEST THAT WHEN 
lERRURT REQUEST 



003120 


010701 






T32I 


SCOPE 




003122 


012706 


000900 






MOV 


•STKPTR.SP 


003126 


009077 


179690 






CUR 


MI 


003132 


012777 


003166 


179646 




MOV 


iT32A,PPIRVECI 


003140 


012777 


000340 


179642 




MOV 


lliPRTY7i»PIRLVL 


003146 


012767 


000200 


174622 




MOV 


*PRTY4,PSW 


003194 


012777 


004000 


179620 




MOV 


iPiR3i»PI 


003162 


000240 








NOP 




003164 


000401 








BR 


T33 


003166 


000000 






T32AI 


HUT 






000033 














000034 








0"D*1 






000004 








H*M+1 






000009 








NRN4.1 





003170 


010701 




T33I 


SCOPE 




003172 


012706 


000900 




MOV 


*STKPTR|SP 


003176 


009077 


179600 




CUR 


Ml 


003202 


012777 


003236 


179976 


MOV 


#T33A,»PIRVECI 


003210 


012777 


000340 


179572 


MOV 


#PRTY7i»PIRLVl. 


003216 


012767 


000240 


174592 


MOV 


«PRTY9iPSH 


003224 


012777 


010000 


179590 


MOV 


«PJR4,»P! 


003232 


000240 






NOP 





THE PRDCCSSER PRIORITY (3> IS 5REATER THAN THE PR05RAM INT 
UEVEU (2) THAT NO INTERRUPT OCCURS", 

IINITIALIZC THE STACK POINTER 
lOLEAR PIRO 

lUOAO Interrupt vector 

lAND STATUS 

iSET PROCESSER STATUS EQUAL TO 3 
(REQUEST INTERRUPT AT LEVEL 2 

108 TO NEXT TEST 
lERROR PR08RAM INTERRUPTED WHEN 
iStAtu3«3| REQUEST LEvtL'S 



THE PROCESSES PRIORITY (4) IS GREATER THAN THE PROGRAM INT 
LEVEL <3) THAT NO INTERRUPT OCCURS', 

I'lNlTlALlZE THE STACK POINTER 
ICLEAR PIRO 

iLCAo Interrupt vector 

lANO STATUS 

/SET PROCESSER STATUS EQUAL TO 4 
IREQUEST INTERRUPT AT LEVEL 3 

ICB TO NEXT TEST 
lERROR PROGRAM INTERRUPTED WHEN 
[STATUS. 4, REQUEST LEVEL-3 



iTEST THAT WHEN THE PROCESSER PRIORITY (5) IS CREATER THAN THE PROGRAM INT 
lERRUPT REQUEST UEVEL (4) THAT NO INTERRUPT OCCURS', 

lIlillTIALiZE THE STACK POINTER 
ICUaR PJR8 

iLOAo Interrupt vector 

lAND STATUS 

iSET PROCESSER STATUS EQUAL TO 5 
iREQUESt INTERRUPT AT LEVEL * 



MAINDEC-ll-DCKBN-A pRQG INT RQST LOOIC 
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003234 


000401 








BR 


T34 


003236 


000000 






T33AI 


HUT 






000034 








c«e*i 






000035 








DiO*l 






000005 








M»M*1 






000006 








NRN4.1 












ITEST 


THAT WHEN 


THE PROCESSER 1 










lERRUPT REQUEST 


UEVEU (9) THAT 


003240 


010701 






T34I 


SCOPE 




003242 


012706 


000900 






MOV 


mSTKPTR.SP 


003246 


009077 


179930 






CUR 


Ml 


003292 


012777 


003306 


179926 




MOV 


illT34A,»PIRVECI 


003260 


012777 


000340 


179922 




MOV 


l|iPRTY7i»PlRLVL 


003266 


012767 


000300 


174908 




MOV 


iliPRTY6iPSW 


003274 


012777 


020000 


179900 




MOV 


IIIPIR9,»P1 


003302 


000240 








NOP 




003304 


000401 








8R 


TS9 


003306 


000000 






T34AI 


HUT 





158 TO NEXT TEST 

lERROR PROGRAM INTERRUPTED WHEN 

lSTATUSi9, REQUEST LEVEL** 



IINITIALIZE THE STACK POINTER 
ICLEAR PIRQ 

iLOAD Interrupt vector 

(AND STATUS 

im PROCESSER STATUS EQUAL TO < 
•REQUEST INTERRUPT AT LEVEL 9 

|S6 TO NEXT TEST 

I'EftROR PROGRAM INTERRUPTED WHEN 

iStATUSi6, REQUEST LEVEL«9 



000035 
000036 
000006 
000007 



CiC+1 
DiD'^1 
M«M*1 
NiN+1 
iTEST THAT WHEN 
lERRUPT REQUEST 



003310 


010701 






T39I 


SCOPE 




003312 


012706 


000500 






MOV 


iSTKPTR.SP 


003316 


009077 


179460 






CUR 


•PI 


003322 


012777 


003396 


179496 




MOV 


«T39A,«P!RVECI 


003330 


012777 


000340 


179492 




MOV 


#PRTY7.»PIRLVL 


003336 


012767 


000340 


17*432 




MOV 


*PRTY7iPSW 


003344 


012777 


040000 


179430 




MOV 


#PIH6,»PI 


003392 


000240 








NOP 




003394 


000401 








BR 


T3« 


003396 


000000 






T39A1 


HUT 






000036 








CiC+1 






000037 








ClD+1 






000007 








MlM*l 






000010 








NiN^l 





THE PROCESSER PRIORITY (7) IS GREATER THAN THE PROGRAM INT 



INITIALIZE THE STACK POINTER 
ICLEAR PIRQ 

ILOAD Interrupt vector 

lANO STATUS 

ISET PRQCEBSER STATUS EQUAL TO 7 
iREQUEST INTERRUPT AT LEVEL 6 

198 TO NEXT TEST 

lERROR PROGRAM INTERRUPTED WHEN 

igTATU8i7, REQUEST LEVELi6 



9. 
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000000 






Na0 








000001 






Mil 














ITEST 


THAT WHEN 












lERRUPT REOUESI 


LEVEL(l) THAT ; 










T36I 


SCOPE 




003362 


012706 


000900 






MOV 


#STKPTR|Sp 


003366 


005077 


175410 






CLR 




003372 


012777 


003426 


175406 




MOV 


|IIT36A,»PIRVEC 


003400 


012777 


000340 


175402 




MOV 


KiPRTY7i»PIRLVL 


003406 


012767 


000000 


174362 




MOV 


iliPRTY0iPSW 


003414 


012777 


001000 


175360 




MOV 


«PlRli»PI 


003422 


000240 








NOP 




003424 


000000 








HUT 




003426 


000400 






T36AI 


BR 


T37 




000001 








NiN+l 






000002 








HlM4'l 






000037 








CtC*l 






000040 








QiO+l 





003430 
003432 
003436 
003442 
003450 
003456 
003464 
003472 
003474 
003476 



(0} IS LESS THAN THE PROGRAM INT 



•INITIALIZE THE STACK POINTER 
I'CIEAR PIRQ 

(LOAD Interrupt vector 

lAND STATUS 

ISET PROCESSER STATUS»0 
iREQUESt INTERRUPT AT LEVELl 

lEPRORI PROGRAM FAjLED TO INTERRUPT 
(CO TO NEXT TEST 



010701 
012706 
005077 
012777 
012777 
012767 
012777 
000240 
000000 
000400 



JTEST THAT WHEN THE PROCESSES PRjORJTY (1) IS LESS THAN THE PROGRAM INT 
lERRUPT REQUEST LEVEL12> THAT IN INTERRUPT OCCURS, 



000500 
175340 
003476 
000340 
000040 
002000 



T37I 



175336 
179332 
17<312 
179310 



T37AI 



SCOPE 

MOV 
CLR 
MOV 
MOV 
MOV 
MOV 
NOP 
HLT 
BR 



iSTKPTR.SP 
•PI 

ll(T37A,PPIRVEC 
*PRTY7i»PIRLVL 
iHPRTYliPSW 
||IPIR2,»PI 



T4B 





000002 








N»N*1 






000003 








M«M*1 






000040 








CiC+1 






000041 








OiO*l 












iTEST 


THAT WHEN 


THE PROCESSER I 










lERRUPT REQUEST 


LEVEL<3) THAT , 


003500 


010701 






T40I 


SCOPE 




003502 


012706 


000500 






MOV 


«STKPTR,SP 


003506 


005077 


179270 






CLR 


•PI 


003512 


012777 


003546 


175266 




MOV 


#T40A,»PIRVEC 


003520 


012777 


000340 


175262 




MOV 


#PRTY7i»PlRlVL 


003526 


012767 


000100 


174242 




MOV 


#PRTY2,PSW 


003534 


012777 


004000 


179240 




MOV 


#PIR3,»PI 


003542 


000240 








NOP 




003544 


000000 








HLT 




003546 


000400 






T40Ai 


BR 


T41 




000003 








NiN+1 






000004 








MtH*l 






000041 








CiC*l 






000042 













/INITIALIZE THE STACK POINTER 
I'CLEAR PIRQ 

I'LOAD Interrupt vector 

lAND status 

(SET PROCESSER STATUS»1 
iREQUEST INTERRUPT AT LEVEL:2 

lERRORl PROGRAM FAILED TO INTERRUPT 
IGO TO NEXT TEST 



•INITIALIZE THE STACK POINTER 
I'CLEAR PIRO 

ILOAO INTERRUPT VECTOR 
lAND STATUS 

iSCT PROCESSER STATUS«2 
iREQUESt INTERRUPT AT LEVEL3 

lERRORI PROGRAM FAILED TO INTERRUPT 
I'GO TO NEXT TEST 



ITEST THAT WHEN THE PROCESSER PRIORITY (3) IS LESS THAN THE PROGRAM INT 



MAINDEC-ll-OCKBN-A PROQ INT pQST LOGIC 
NA 



MACY11,607 25-FEB-72 12II5 PAGE 18 











lERRUPT 


REQUEST 


LEVEL(«) THAT 


003590 


010701 






T4i! 


SCOPE 




003552 


012706 


000500 






MOV 


i»STKPTR,SP 


003556 


005077 


175220 






CUR 


•PI 


003562 


012777 


003616 


175216 




MOV 


#T41Ai^PIRVEC 


003570 


012777 


000340 


175212 




MOV 


#PRTY7i^PIRLVL 


003576 


012767 


000140 


174172 




MOV 


#PRTY3iPSW 


003604 


012777 


010000 


179170 




MOV 


#PIR4,PpI 


003612 


000240 








NOP 




003614 


000000 








HLT 




003616 


000400 






T41AI 


BR 


T42 




000004 








NiN^l 






000005 








MlM^t 






000042 








CiC*l 






000043 








DiO*l 





iTEST THAT WHEN 
lERRUPT REQUEST 



003620 


010701 






T42I 


SCOPE 




003622 


012706 


000500 






MOV 


mSTKPTR.SP 


003626 


009077 


179150 






CLR 


•PI 


003632 


012777 


003666 


17514$ 




MOV 


#T42A,»PIRVEC 


003640 


012777 


000340 


175142 




MOV 


#PRTY7i^PIRLVL 


003646 


012767 


000200 


174122 




MOV 


#PRTY4,P8W 


003694 


012777 


020000 


175120 




MOV 


#PIR9,^P1 


003662 


000240 








NOP 




003664 


000000 








HLT 




003666 


000400 






T42AI 


BR 


T43 




000005 








NiN<^l 






000006 








H»M*1 






000049 








CiC*l 






000044 








0»D*1 





ITEST THAT WHEN 
lERRUPT REQUEST 



003670 


010701 






T43I 


SCOPE 




003672 


012706 


000500 






MOV 


*STKPTR,SP 


003676 


009077 


175100 






CLR 


•PJ 


003702 


012777 


003736 


175076 




MOV 


*T43A|^PIRVEC 


003710 


012777 


000340 


179072 




MOV 


#PRTY7i»PIRLVL 


003716 


012767 


000240 


174092 




MOV 


mPRTYSiPSW 


003724 


012777 


040000 


179090 




MOV 


*PIH6,^P1 


003732 


000240 








NOP 




003734 


000000 








HLT 




003736 


000400 






T43AI 


BR 


T44 




000006 








NiN-M 






000007 








HiM+1 






000044 








CIC41 






000049 








OlO+l 












ITEST THAT WHEN 


THE PROCESSER 1 










lERRUPT 


REQUEST 


LEVEL(7) THAT , 


003740 


010701 






T44I 


SCOPE 




003742 


012706 


000500 






MOV 


#ITKPTR,SP 



I'lNITIALlZe THE STACK POINTER 
ICLEAR PIRQ 

ILOAD INTERRUPT VECTOR 
I AND STATUS 

ISET PROCESSER STATUSES 
IREQUEST INTERRUPT AT LEVEL4 

IERROR! program FAILED TO INTERRUPT 
iGO TO NEXT TEST 



THE PROCESSER PRIORITY (41 IS LESS THAN THE PROGRAM INT 
LEVEL!5) THAT AN INTERRUPT OCCURS', 

lINITIiLlZE THE STACK POINTER 
ICL'EAR PIRQ 

iLbAD Interrupt vector 

(AND STATUS 

ISET PRpCESSER STaTuS»4 
IREQUEST INTERRUPT AT LEVEL'5 

lERRORl PROGRAM FAILED TO INTERRUPT 
iGO TO NEXT TEST 



THE PROCESSER PRIORITY (51 IS LESS THAN THE PROGRAM INT 
LEVEL(6» THAT AN INTERRUPT OCCURS', 

itNlTlALlZC THE STACK POINTER 
I CLEAR PIRQ 

I'uoAD Interrupt vector 

I AND STATUS 

iSET PROCESSER STATUSi5 
IRCQUEST INTERRUPT AT LEVEL6 

itMORl PROGRAM FAILED TO INTERRUPT 
lOe TO NEXT TEST 



I'llillTIiLIHE THE STACK POINTER 
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003746 


00S077 


179030 




CUR 


MJ 


tCLEAR PIRQ 




01277" 


004006 


i7522i 


MOV 


#T44Ai*PifiVfce 


lUoAa iNTIRRuRT VECTOR 


003760 


012777 


000340 


179022 


MOV 


#RRTY7i»PIRLVL 


iano status 


003766 


012767 


000300 


174002 


MOV 


*RRTY6»RSH 


iSET PROCCSSER STATuSi6 


003774 


012777 


100000 


179000 


MOV 


WW \n ' 1 I 




004002 


000240 






NOR 






004004 


000000 






HUT 




lERRORI PROGRAM FAILED TO INTERRUPT 


00400$ 


000400 




T44Ai 


SR 


T45 


150 TO NEXT TEST 




000007 






NlN*l 








000010 






MtM*l 








000049 






CiC*l 








000046 






DlO^l 







004010 


012736 


000500 




T49I 


MOV 


004014 


009000 








CLR 


004016 


012767 


000340 


173752 




MOV 


\D}p^\p £^ 


97T7 


177777 


4 74790 




MOV 


004032 
004040 


01277? 


004096 


4 7474« 




MOV 


012777 


000340 


174742 




MOV 


004046 


009067 


173724 






CLR 


004092 


000000 








HLT 


004094 


000566 








BR 


004096 


012700 


100000 




LEVEL? 1 


MOV 


004062 


022777 


177356 


174712 




CMP 


004070 


001401 








BEO 


004072 


000000 








HLT 


004074 


042777 


100000 


174700 




Bie 


004102 


012777 


004120 


174676 




MOV 


004110 


022626 








P0P2 


004112 


005067 


173660 






CLR 


004116 


000000 








HLT 


004120 


052700 


040000 




LEVEL6i 


b:s 


004124 


022777 


077314 


174650 




CMP 




W014S1 










004134 


000000 








HLT 


004136 


042777 


040000 


174636 




BIC 


004144 


012777 


004162 


174634 




MOV 


004192 


022626 








P0P2 


0041S4 


005067 


173616 






CLR 


004160 


000000 








HLT 


004162 


052700 


020000 




LEVEL9I 


BIS 


004166 


022777 


037292 


174606 




CHP 


004174 


001401 








SES 


004176 


000000 








HLT 


004200 


042777 


020000 


174974 




B|C 


004206 


012777 


004224 


174972 




MOV 


004214 


022626 








P0P2 


004216 


009067 


173594 






CLR 


004222 


000000 








HLT 



iTtST THAT PIRO REQUESTS AN INTERRtJPT AT EACH LEVEL AS THE REOOEST LEVEL 
lis OECRCASEDi 

«STKPTR|9P lINITIALIiE STACK POINTER 

X0 

«PRTY7»PSW iLOCK OUT INTERRUPTS 

*«1,»PI I'REQUEST AN INTERRUPT AT ALL LEVELS 

*LEV£L7f SP'RVEC i'LOAC 'NT', RQSTi VECTOR 
#?RTY7iip'jRLVL iAND 'NEw) STATUS 
P8H lALLOH INTERRUPTS AT ALL LEVELS 

/ERROR! NO INTERRUPT 
T49EX lEXlT TEST 

#PIR7,X0 iSET INDICATOR BIT IN R0 

#PIH7*PIR6APIR9+PiR4*P!R3*PIR2*PIRi*PIA7,PPI 
,*4 lis PIRQ CORRECT? 

1" INCORRECT PIRO 
#PIR7,»PI lOCLETE REQUEST AT LEVEL 7 

lllLEVEL6,»P!RVEC iSET UP FOR LEVEL 6 REQUEST 

iRESTORE THE STACK 
PSW lAL'LOH INTERRUPTS 

I ERROR! NO INTERRUPT 
#PIR6|X0 jSCT INDICATOR BIT 

l|iPIR6*PIR5*P!R4+PIR3*P!R2*PIRl*PIA6,»Pt 
,44 lis rlRQ CORREC't 

lERRORI INCORRECT PIRQ 
#PIR6,«PI IDELETE LEVEL 6 REQUEST 

#LEVEL5i»PIRVEe iSET UP FQR LEVEL 9 REQUEST 

iRESTORE THE STACK 
PSW i'ALLOH INTERRUPTS 

lERRORt NO INTERRUPT 

#PIR9i»0 iSET INDICATOR BIT 

#PIRS*PIR4*PJ83*P!R2*P!HI*P1A5|»PI 
,*4 (IS PIRQ CORRECT 

lERRORI INCORRECT PIRQ 
PPIR5,PPI lOELETC LEVEL 9 REQUEST 

#LEVEL4,PPtRVEC iSET UP FQR LEVEL 4 REQUEST 

iRISTORE THE STACK 
PSW lAlLOH INTERRUPTS 

lEPRORI NO INTERRUPT 
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004224 


052700 


010000 




LEVEL4I 


BIS 


004230 


022777 


017210 


174544 




CMP 


004236 


001401 








BCQ 


004240 


000000 








HLT 


004242 


042777 


010000 


174532 




BIC 


004250 


012777 


004266 


174530 




MOV 


004296 


022626 








P0P2 


004260 


005067 


lT39i2 






CLR 


004264 


000000 








HLT 


004266 


092700 


004000 




LEVELS) 


BIS 


004272 


022777 


007146 


174502 




CMP 


004300 


001401 








BEQ 


004302 


000000 








HLT 


004304 


042777 


004000 


174470 




BIC 


004312 


012777 


004330 


174466 




MOV 


004320 


022626 








P0P2 


004322 


005067 


173450 






CLR 


004326 


000000 








HLT 


004330 


052700 


002000 




LEVEL2I 


BIS 


004334 


022777 


003104 


174440 




CMP 


004342 


001401 








BCQ 


004944 


000000 








HLT 


004346 


042777 


002000 


174426 




B|C 


004394 


012777 


004372 


174424 




MOV 


004362 


022626 








P0P2 


004364 


009067 


173406 






CLR 


004370 


000000 








HLT 


004372 


092700 


001000 




LEVELII 


B|S 


004376 


022777 


001042 


174376 




CMP 


004404 


001401 








BEQ 


004406 


000000 








HLT 


004410 


022626 








P0P2 


004412 


009077 


174364 






CLR 


004416 


009067 


173394 






CLR 


004422 


022700 


177000 






CMP 


004426 


001401 








BEQ 


004430 


000000 








HLT 


004432 


000240 






T45EXI 


NOP 



«PIR4,XB iSET INDICATOR BIT 

iPIR4*PIR3*PIR2*l»lRl*PlA4,»PI 
1*4 lis PIRQ CORRECT? 

lERROR! INCORRECT PIRQ 
•PIR4,»PI lOELETE LEVEL 4 REQUEST 

*LEVEL3,#PIRVEB iSET UP FQR LEVEL 3 REQUEST 

I'RCSTORE THE STACK 

PSW iaClow interrupts 

I'CRROR! NO interrupt 

»PIR3,X0 iSET INDICATOR BIT 

#PIR3*PlR2*PIRl+PU3,»iPI 

,*4 lis RIRQ CORRECT? 

ICRRORI INCORRECT PIRO 
«PIR3,PP! IDELETC LEVEL 3 REQUEST 

•LEVEL2.»P!RVEe /SET UR FQR LEVEL 2 REQUEST 

/RESTORE THE STACK 
PSW /ALLOW INTERRUPTS 

lERRORI NO INTERRUPT 

«PIR2i«B /SET INDICATOR BtT 

#PIR2*PIR1*P1A2,MI 

,*4 lis PIRO CORRECT? 

I ERROR I INCORRECT PIRQ 
«PIR2,«PI lOtLETI LEVEL 2 REQUEST 

•LCVCLliMlRVEO /ItT UP FOR LEVEL i REQUEST 

IWSTORE THE STACK 
PSW /ALLOW INTERRUPTS 

/ERROR! NO INTERRUPT 



/SIT INDICATOR BIT 

/!S PIRQ CORRECT? 
/ERROR! INCORRECT PIRO 
/RESTORE THE STACK 
/CLEAR PROGRAM I NT", RQST'. RES, 

/WERE ALL LEVELS SERVICED 

/ERROR! A LEVELIS) NOT SERVICES 
lH!SStNGBtT(8) GIVE LEVEL MISSED 

ICHECK THAT PROGRAM INTERRUPT REQUEST TAKE PRECEDENCE 
lOVER BUS INTERRUPT (TTYJ 



PPIRliXB 

*PIR1*PIA1,»PI 

.*4 



•PI 

PSW 

#177000, X0 
• *4 



■904494 


010701 




T46I 


SCOPE 


004436 


012706 


000900 




MOV 


004442 


000237 






SPL 


004444 


012777 


004520 


174334 


MOV 


004492 


012777 


020200 


174330 


MOW 


004460 


012737 


004522 


000064 


MOV 


004466 


012737 


000200 


000066 


MOV 


Z04474 


5112737 


000100 


177564 


MOV 



#9TKPTRiX6 
7 

#T46A,«P!RVEC 

#prty«,»p:rlvl 
i|it46s,»(itpvec 

iliPRTY4,»«TPVEC*2 
#1B0I»«TPCSR 



/SET STACK PTR 

/SET PRIOTITY LEVEL 7 

/LOAD PIRQ INT VECTOR 

/ASSUME PRIORITY LEVEL 4 ON iNTE 

/LOAD TTY PRINTER INTERRUPT 

/SET IE SIT 



?UF1 
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itJ Kf ^ 3 10c 


012777 


010000 


1 ^ ^£ / < 




HQ V 


iPIR4,»Pl 


IREQUEST INTERRUPT AT LEVEL 4 


00^510 


00S037 


17T776 






cu^ 


•#PSM 


i'aLloh piro interrupt 


00^514 
















004516 














lERRORINO INTERRUPT 










T46A I 


on 


,*4 


(BRANCH OVER HALT WHEN PtRS INTERRUP' 










T46B 1 


Ul T 

HUT 




lERRCRl TTT INTERRUPTED 


004524 


005077 


174Z5Z 








MI 




if' 70 10 


10 07100 ^ 


I r ' Po^ 








•#TPCSH 




004534 


012737 


(OKI Cueo 


10 v 10 10 7 




MOV 


#TPVEC*2i»«TPVEC 


004542 


010701 






T47 1 


SCOPE 


















7 


ISET PRIORITY LEVEL »7 


004546 


012706 


000500 






MOV 


#STKPTR,X6 


|3ET STiCK PTR 


004552 


312737 


004612 


000030 






«T47*i»#EMTVEC 


ILOAD EMT TRAP VECTOR 














»#EMTVEC*2 


lASSUME PRIORITY LEVEL AfTER EMT 


004564 


012777 


004614 


174214 






*T47B>PIRVEC 


lLb*0 PIRQ INTERRUPT VECTOR 


004572 


012777 


000340 






MQV 


iliPRTY7i»PIRl.VL 


/ASSUME PRIORITY LEVEL 7 AFTER INT 




012777 




174174 




MOV 


#PIR4,»P1 


iBooK Interrupt rqst at level 4 




104000 








EMT 




iTRAP. ASUME LEVEL AFTER TRAP 




000000 








HUT 




iEPRori failed to trap 


1504612 


000000 






T47AI 


HLT 




lERRORI PIRQ INT, FAILED AfTER EMT 


00*614 


022726 


004612 




T47BI 


CMP 


#T47A, (6)* 


iCflECK RETURN PC ON THE STACK 


004620 


001401 








BCQ 


,*4 






000000 








HLT 




lEPRORI INCORRECT PC ON THE STACK 


004624 


009726 








TST 


(6»* 


iCrtECK STATUS ON STACK 


004626 


001401 








BEQ 


,** 




004630 


000000 








Hl,7 




lERRORI INCORRECT STATUS ON STACK 


004632 


005077 


174144 






C^R 


•PI 


ICLEAR INTERRUPT REQUEST 


004636 


014777 


174146 


17414Z 




MOV 


PIRLVLi»PlRVEC 


/RESTORE INT VECTOR 


004644 


005077 


174140 






CL" 


•PIRLVU 






012737 










«EMTVEC+2,*#EMTVEC 


004696 


010701 








SCOPE 






004660 


009267 


174114 




END t 


INC 


ICNT 


/INCREMENT THE PASS COUNTER 


004664 


024727 


174110 


001000 




CMP 


ICNT)ii'1000 




004672 


001402 








BEQ 


DONE 




004674 


000147 


174122 






JMP 


BEGIN 


/RESTART THE TEST 


004700 


012747 


000007 


172660 


DON£l 


MOV 


#7,TPBUr 


/RING THE BELL 


004706 


105747 


172652 






TSTa 


TPCSR 


/Wir FOR BELL TO 


004712 


100375 








BPU 


,■4 


/RING 


004714 


?13702 


000042 






MOV 


•#42, X2 


/GET DECTaPE MONITOR RETURN AD6RESS 


004720 


001404 








BEQ 


DONEl 


/D8 NOT RETURN IF (42)»0 


004722 


004712 








JSR 


7,<2J 


/RETURN TO DECTAPE MONITOR 


004724 


000240 








NOP 




/A6T11 


004726 


000240 








NOP 




/OVERLAY 


004730 


000240 








NOP 




/AREA 


004732 


000147 


174054 




DONEll 


JMP 


START 






000001 








.END 
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BEGIN 


001022 


C 


■ 000045 





■ 


000046 


DISPLA 


■ 177S70 


DONE 


004700 


DONEl 


004732 


EMTVEC 


> 


000030 


ENS 


004660 


ERRVEC 


■ 000004 


HLT 


« 000000 


ICNT 




001000 


fOTVEC 


■ 000020 


LEVELl 


004372 


LEVEL2 


004330 


LEVELS 




004266 


LEVEL4 


004224 


LEVELS 


004162 


LEVEL6 


004120 


LEVEL7 




004056 


M 


■ 000010 


N 


■ 000007 


PC 


■X000007 


PFVEC 


« 


000024 


PI 


001002 


PIA0 


■ 000000 


PIAl 


■ 000042 


PIA2 


■ 


000104 


PU3 


( 000144 


PIA4 


« 000210 


PIA5 


« 000292 


PIA6 


a 


000314 


Pli7 


■ 000354 


PIH 


001004 


PIRLVL 


001010 


PIRVEC 




001006 


PIR0 


I 000000 


PIRl 


■ 001000 


PIR10 


■ 100000 


PIR2 


■ 


002000 


PIR3 


• 004000 


PIR4 


■ 010000 


PIR5 


> 020000 


PIR6 




040000 


PIR7 


■ 100000 


P0P2 


■ 022624 


PRTY0 


■ 000000 


PRTYl 


■ 


000040 


PRTY10 


■ 000340 


PRTY2 


I 000100 


PRTY3 


■ 000140 


PRTy4 


a 


000200 


PRTY5 


> 000240 


PRTY6 


■ 000300 


PRTY7 


« 000340 


PSW 


> 


177776 


RESVEC 


■ 000010 


R0 


■X000000 


Rl 


■X000001 


R2 


(X000002 


R3 


■X000003 


R4 


■X000004 


R5 


■X000005 


SCOPE 


i 
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